perm filename CRECYC[4,LMM] blob sn#040778 filedate 1973-05-06 generic text, type T, neo UTF8

(DEFPROP CRECYCFNS
 (CRECYCFNS (SETQ LOADING T)
	    (DE DECIMAL NIL (SETQ BASE (SETQ IBASE (PLUS 5. 5.))))
	    (DSKIN (FORSM . LSP)
		   (DUMMY . LAP)
		   (INIT . LAP)
		   (FORLSP . LAP)
		   (MORE . LAP)
		   (CYCPRE . LSP)
		   (CYCOMA . LAP)
		   (CYCOMB . LAP)
		   (CYCOMD . LAP)
		   (CYCOME . LAP)
		   (CYCOMF . LAP)
		   (CYCOMG . LAP)
		   (CYCOMH . LAP)
		   (CYCMR1 . LSP)
		   (CYCCAT . LSP)
		   (CYCMR2 . LSP)
		   (EXPAND . LSP)
		   ARGLISTS
		   (STRGEN . LSP)
		   (CYCDRJ . LAP))
	    (STARTUP))
VALUE)

(SETQ LOADING T)

(DE DECIMAL NIL (SETQ BASE (SETQ IBASE (PLUS 5. 5.))))

(DSKIN (FORSM . LSP)
       (DUMMY . LAP)
       (INIT . LAP)
       (FORLSP . LAP)
       (MORE . LAP)
       (CYCPRE . LSP)
       (CYCOMA . LAP)
       (CYCOMB . LAP)
       (CYCOMD . LAP)
       (CYCOME . LAP)
       (CYCOMF . LAP)
       (CYCOMG . LAP)
       (CYCOMH . LAP)
       (CYCMR1 . LSP)
       (CYCCAT . LSP)
       (CYCMR2 . LSP)
       (EXPAND . LSP)
       ARGLISTS
       (STRGEN . LSP)
       (CYCDRJ . LAP))

(STARTUP)